SHORT cutoff:
SHORT_CUTOFF
## [1] 2
LONG cutoff:
LONG_CUTOFF
## [1] 5
mydata_long %>% count(diagnosis,disease_duration_category)
## Source: local data frame [4 x 3]
## Groups: diagnosis [?]
##
## # A tibble: 4 x 3
## diagnosis disease_duration_category n
## <fctr> <fctr> <int>
## 1 CBS SHORT 8
## 2 CBS LONG 12
## 3 PSP SHORT 8
## 4 PSP LONG 16
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(scp_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8101821
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(scp_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.5798734
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(scp_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.7437332
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(scp_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.5047522
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(motor_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.7296886
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(motor_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.7598621
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(motor_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.944938
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(motor_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.8805148
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(midbrain_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.03605806
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(midbrain_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.5087471
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(total_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.6809166
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(total_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.1484854
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(total_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.5004565
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(total_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.7456574
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(precentral_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.7493899
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(precentral_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.002524578
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(precentral_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8658294
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(precentral_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.03209973
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(scp_b_ad_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.9941252
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(scp_b_ad_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.7962575
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(scp_b_rd_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.7536128
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(scp_b_rd_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.5347278
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(precentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.534003
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(precentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.8903332
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(precentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.1719783
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(precentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.9122561
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(precentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8606234
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(precentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.8716657
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(postcentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.9021901
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(postcentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.7380292
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(postcentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8936642
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(postcentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.458973
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(postcentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.5450388
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(postcentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.4081793
t.test for SHORT vs LONG group diff in slope among CBS:
t.test(scp_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.3357956
t.test for SHORT vs LONG group diff in slope among PSP:
t.test(scp_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.4400818
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(scp_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.6334385
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(scp_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.5713583
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(scp_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8285571
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(scp_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.5208065
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(motor_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8125257
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(motor_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.4697552
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(motor_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.9622583
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(motor_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.6805944
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(midbrain_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.04308926
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(midbrain_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.4697552
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(total_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.6690662
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(total_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.1737762
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(total_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8125257
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(total_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.6064685
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(precentral_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8285571
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(precentral_b_fa_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.004096213
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(precentral_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8967503
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(precentral_b_md_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.04734461
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(scp_b_ad_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.6964669
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(scp_b_ad_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.5208065
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(scp_b_rd_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8967503
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(scp_b_rd_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.6784314
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(precentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.886775
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(precentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.6064685
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(precentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.363842
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(precentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.7576923
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(precentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.886775
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(precentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.6064685
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(postcentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.7396133
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(postcentral_b_gm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.4697552
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(postcentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.8125257
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(postcentral_b_gm_thick_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.7576923
wilcox.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(postcentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.7396133
wilcox.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(postcentral_b_wm_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.6805944
t.test for SHORT vs LONG group diff in slope among CBS:
wilcox.test(scp_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="CBS")$p.value
## [1] 0.5361991
t.test for SHORT vs LONG group diff in slope among PSP:
wilcox.test(scp_vol_slope~disease_duration_category, data=mydata_long,subset= diagnosis=="PSP")$p.value
## [1] 0.351049